/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc A) / Acorn User China CD-ROM (UK) (Disc A).bin / DEMON / DEVELOPER / NETCONF0.ARC / !NetConfig_Lib_dragfile

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0e f4 3e 44 72 | 61 67 46 69 6c 65 0d 00 |.....>Dr|agFile..|
|00000010| 14 21 f4 20 43 6f 70 79 | 72 69 67 68 74 20 31 39 |.!. Copy|right 19|
|00000020| 39 35 20 43 6f 6c 69 6e | 20 48 6f 67 62 65 6e 0d |95 Colin| Hogben.|
|00000030| 00 1e 44 f4 20 59 6f 75 | 20 6d 61 79 20 75 73 65 |..D. You| may use|
|00000040| 20 74 68 69 73 20 63 6f | 64 65 20 66 6f 72 20 61 | this co|de for a|
|00000050| 6e 79 20 6e 6f 6e 2d 70 | 72 6f 66 69 74 20 70 75 |ny non-p|rofit pu|
|00000060| 72 70 6f 73 65 2c 20 70 | 72 6f 76 69 64 65 64 20 |rpose, p|rovided |
|00000070| 79 6f 75 0d 00 28 3e f4 | 20 64 6f 63 75 6d 65 6e |you..(>.| documen|
|00000080| 74 20 61 6e 79 20 63 68 | 61 6e 67 65 73 20 6d 61 |t any ch|anges ma|
|00000090| 64 65 20 61 6e 64 20 61 | 70 70 6c 79 20 74 68 65 |de and a|pply the|
|000000a0| 20 73 61 6d 65 20 63 6f | 6e 64 69 74 69 6f 6e 73 | same co|nditions|
|000000b0| 2e 0d 00 32 04 0d 00 3c | 14 dd 20 a4 64 72 61 67 |...2...<|.. .drag|
|000000c0| 66 69 6c 65 5f 69 6e 69 | 74 0d 00 46 13 f2 6c 69 |file_ini|t..F..li|
|000000d0| 62 72 61 72 79 28 22 64 | 6c 67 22 29 0d 00 50 13 |brary("d|lg")..P.|
|000000e0| 64 72 61 67 66 69 6c 65 | 5f 72 65 66 25 3d 30 0d |dragfile|_ref%=0.|
|000000f0| 00 5a 06 3d 30 0d 00 64 | 04 0d 00 6e 29 dd 20 f2 |.Z.=0..d|...n). .|
|00000100| 64 72 61 67 66 69 6c 65 | 5f 63 72 65 61 74 65 28 |dragfile|_create(|
|00000110| 76 61 72 24 2c 6c 61 62 | 65 6c 24 2c 74 79 70 65 |var$,lab|el$,type|
|00000120| 25 29 0d 00 78 1f ea 20 | 6c 61 62 65 6c 25 2c 76 |%)..x.. |label%,v|
|00000130| 61 6c 75 65 25 2c 69 63 | 6f 6e 25 2c 69 63 6f 6e |alue%,ic|on%,icon|
|00000140| 24 0d 00 82 3a 6c 61 62 | 65 6c 25 3d a4 5f 64 6c |$...:lab|el%=._dl|
|00000150| 67 5f 6c 61 62 65 6c 28 | 64 6c 67 5f 78 25 2c 64 |g_label(|dlg_x%,d|
|00000160| 6c 67 5f 79 25 2d 35 36 | 2c 32 35 36 2d 64 6c 67 |lg_y%-56|,256-dlg|
|00000170| 5f 78 25 2c 6c 61 62 65 | 6c 24 29 0d 00 8c 35 76 |_x%,labe|l$)...5v|
|00000180| 61 6c 75 65 25 3d a4 5f | 64 6c 67 5f 77 72 69 74 |alue%=._|dlg_writ|
|00000190| 61 62 6c 65 28 32 36 30 | 2c 64 6c 67 5f 79 25 2d |able(260|,dlg_y%-|
|000001a0| 37 32 2c 32 30 2c 32 35 | 35 2c 22 41 7e 20 22 29 |72,20,25|5,"A~ ")|
|000001b0| 0d 00 96 16 62 75 66 25 | 21 30 3d 64 6c 67 5f 77 |....buf%|!0=dlg_w|
|000001c0| 69 6e 64 6f 77 25 0d 00 | a0 0e 62 75 66 25 21 34 |indow%..|..buf%!4|
|000001d0| 3d 36 32 34 0d 00 aa 14 | 62 75 66 25 21 38 3d 64 |=624....|buf%!8=d|
|000001e0| 6c 67 5f 79 25 2d 37 32 | 0d 00 b4 12 62 75 66 25 |lg_y%-72|....buf%|
|000001f0| 21 31 32 3d 36 32 34 2b | 36 38 0d 00 be 14 62 75 |!12=624+|68....bu|
|00000200| 66 25 21 31 36 3d 64 6c | 67 5f 79 25 2d 34 0d 00 |f%!16=dl|g_y%-4..|
|00000210| c8 11 62 75 66 25 21 32 | 30 3d 26 41 31 31 42 0d |..buf%!2|0=&A11B.|
|00000220| 00 d2 13 e7 20 74 79 70 | 65 25 3d 26 31 30 30 30 |.... typ|e%=&1000|
|00000230| 20 8c 0d 00 dc 17 20 20 | 69 63 6f 6e 24 3d 22 64 | .....  |icon$="d|
|00000240| 69 72 65 63 74 6f 72 79 | 22 0d 00 e6 05 cc 0d 00 |irectory|".......|
|00000250| f0 24 20 20 69 63 6f 6e | 24 3d 22 66 69 6c 65 5f |.$  icon|$="file_|
|00000260| 22 2b c2 22 30 30 22 2b | c3 7e 74 79 70 65 25 2c |"+."00"+|.~type%,|
|00000270| 33 29 0d 00 fa 05 cd 0d | 01 04 1b f2 74 72 61 63 |3)......|....trac|
|00000280| 65 28 22 73 70 72 69 74 | 65 20 22 2b 69 63 6f 6e |e("sprit|e "+icon|
|00000290| 24 29 0d 01 0e 17 62 75 | 66 25 21 32 34 3d a4 73 |$)....bu|f%!24=.s|
|000002a0| 74 72 64 75 70 28 22 22 | 29 0d 01 18 1e 62 75 66 |trdup(""|)....buf|
|000002b0| 25 21 32 38 3d a4 73 74 | 72 64 75 70 28 22 53 22 |%!28=.st|rdup("S"|
|000002c0| 2b 69 63 6f 6e 24 29 0d | 01 22 0d 62 75 66 25 21 |+icon$).|.".buf%!|
|000002d0| 33 32 3d 31 0d 01 2c 25 | c8 99 22 57 69 6d 70 5f |32=1..,%|.."Wimp_|
|000002e0| 43 72 65 61 74 65 49 63 | 6f 6e 22 2c 2c 62 75 66 |CreateIc|on",,buf|
|000002f0| 25 20 b8 20 69 63 6f 6e | 25 0d 01 36 44 f2 67 61 |% . icon|%..6D.ga|
|00000300| 64 67 65 74 5f 63 72 65 | 61 74 65 28 76 61 72 24 |dget_cre|ate(var$|
|00000310| 2c 67 61 64 67 65 74 5f | 44 52 41 47 46 49 4c 45 |,gadget_|DRAGFILE|
|00000320| 2c 6c 61 62 65 6c 25 2c | 76 61 6c 75 65 25 2c 69 |,label%,|value%,i|
|00000330| 63 6f 6e 25 2c 74 79 70 | 65 25 2c 30 29 0d 01 40 |con%,typ|e%,0)..@|
|00000340| 0f 64 6c 67 5f 79 25 2d | 3d 31 30 30 0d 01 41 43 |.dlg_y%-|=100..AC|
|00000350| f2 65 76 65 6e 74 5f 63 | 6c 61 69 6d 28 65 76 65 |.event_c|laim(eve|
|00000360| 6e 74 5f 4d 53 47 2b 32 | 2c 65 76 65 6e 74 5f 41 |nt_MSG+2|,event_A|
|00000370| 4e 59 2c 65 76 65 6e 74 | 5f 41 4e 59 2c 22 5f 64 |NY,event|_ANY,"_d|
|00000380| 72 61 67 66 69 6c 65 5f | 61 63 6b 22 2c 30 29 0d |ragfile_|ack",0).|
|00000390| 01 68 05 e1 0d 01 72 04 | 0d 01 73 16 dd 20 f2 64 |.h....r.|..s.. .d|
|000003a0| 72 61 67 66 69 6c 65 5f | 64 65 6c 65 74 65 0d 01 |ragfile_|delete..|
|000003b0| 74 43 f2 65 76 65 6e 74 | 5f 63 6c 61 69 6d 28 65 |tC.event|_claim(e|
|000003c0| 76 65 6e 74 5f 4d 53 47 | 2b 32 2c 65 76 65 6e 74 |vent_MSG|+2,event|
|000003d0| 5f 41 4e 59 2c 65 76 65 | 6e 74 5f 41 4e 59 2c 22 |_ANY,eve|nt_ANY,"|
|000003e0| 5f 64 72 61 67 66 69 6c | 65 5f 61 63 6b 22 2c 30 |_dragfil|e_ack",0|
|000003f0| 29 0d 01 75 05 e1 0d 01 | 76 04 0d 01 7c 1b dd 20 |)..u....|v...|.. |
|00000400| f2 64 72 61 67 66 69 6c | 65 5f 73 74 61 72 74 28 |.dragfil|e_start(|
|00000410| 67 61 64 25 29 0d 01 86 | 0d ea 20 6f 78 25 2c 6f |gad%)...|.. ox%,o|
|00000420| 79 25 0d 01 90 1e f2 74 | 79 70 65 5f 63 68 65 63 |y%.....t|ype_chec|
|00000430| 6b 28 67 61 64 25 2c 54 | 5f 67 61 64 67 65 74 29 |k(gad%,T|_gadget)|
|00000440| 0d 01 9a 16 62 75 66 25 | 21 30 3d 64 6c 67 5f 77 |....buf%|!0=dlg_w|
|00000450| 69 6e 64 6f 77 25 0d 01 | a4 21 c8 99 22 57 69 6d |indow%..|.!.."Wim|
|00000460| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|00000470| 22 2c 2c 62 75 66 25 0d | 01 ae 16 6f 78 25 3d 62 |",,buf%.|...ox%=b|
|00000480| 75 66 25 21 34 2d 62 75 | 66 25 21 32 30 0d 01 b8 |uf%!4-bu|f%!20...|
|00000490| 17 6f 79 25 3d 62 75 66 | 25 21 31 36 2d 62 75 66 |.oy%=buf|%!16-buf|
|000004a0| 25 21 32 34 0d 01 c2 16 | 62 75 66 25 21 30 3d 64 |%!24....|buf%!0=d|
|000004b0| 6c 67 5f 77 69 6e 64 6f | 77 25 0d 01 cc 18 62 75 |lg_windo|w%....bu|
|000004c0| 66 25 21 34 3d 67 61 64 | 25 21 47 5f 64 5f 66 69 |f%!4=gad|%!G_d_fi|
|000004d0| 6c 65 0d 01 d6 1f c8 99 | 22 57 69 6d 70 5f 47 65 |le......|"Wimp_Ge|
|000004e0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 75 66 |tIconSta|te",,buf|
|000004f0| 25 0d 01 e0 16 62 75 66 | 25 21 30 3d 64 6c 67 5f |%....buf|%!0=dlg_|
|00000500| 77 69 6e 64 6f 77 25 0d | 01 ea 0c 62 75 66 25 21 |window%.|...buf%!|
|00000510| 34 3d 35 0d 01 f4 0f 62 | 75 66 25 21 38 2b 3d 6f |4=5....b|uf%!8+=o|
|00000520| 78 25 0d 01 fe 10 62 75 | 66 25 21 31 32 2b 3d 6f |x%....bu|f%!12+=o|
|00000530| 79 25 0d 02 08 10 62 75 | 66 25 21 31 36 2b 3d 6f |y%....bu|f%!16+=o|
|00000540| 78 25 0d 02 12 10 62 75 | 66 25 21 32 30 2b 3d 6f |x%....bu|f%!20+=o|
|00000550| 79 25 0d 02 1c 0d 62 75 | 66 25 21 32 34 3d 30 0d |y%....bu|f%!24=0.|
|00000560| 02 26 0d 62 75 66 25 21 | 32 38 3d 30 0d 02 30 15 |.&.buf%!|28=0..0.|
|00000570| 62 75 66 25 21 33 32 3d | 26 37 46 46 46 46 46 46 |buf%!32=|&7FFFFFF|
|00000580| 46 0d 02 3a 15 62 75 66 | 25 21 33 36 3d 26 37 46 |F..:.buf|%!36=&7F|
|00000590| 46 46 46 46 46 46 0d 02 | 44 2d f2 77 69 6d 70 5f |FFFFFF..|D-.wimp_|
|000005a0| 64 72 61 67 62 6f 78 28 | 62 75 66 25 2c 22 5f 64 |dragbox(|buf%,"_d|
|000005b0| 72 61 67 66 69 6c 65 5f | 64 6f 6e 65 22 2c 67 61 |ragfile_|done",ga|
|000005c0| 64 25 29 0d 02 4e 1d f2 | 74 72 61 63 65 28 22 64 |d%)..N..|trace("d|
|000005d0| 72 61 67 62 6f 78 20 73 | 74 61 72 74 65 64 22 29 |ragbox s|tarted")|
|000005e0| 0d 02 58 05 e1 0d 02 62 | 04 0d 02 6c 1b dd 20 a4 |..X....b|...l.. .|
|000005f0| 5f 64 72 61 67 66 69 6c | 65 5f 64 6f 6e 65 28 67 |_dragfil|e_done(g|
|00000600| 61 64 25 29 0d 02 76 0b | ea 20 66 69 6c 65 24 0d |ad%)..v.|. file$.|
|00000610| 02 80 30 66 69 6c 65 24 | 3d a4 69 63 6f 6e 5f 67 |..0file$|=.icon_g|
|00000620| 65 74 74 65 78 74 28 64 | 6c 67 5f 77 69 6e 64 6f |ettext(d|lg_windo|
|00000630| 77 25 2c 67 61 64 25 21 | 47 5f 69 63 6f 6e 29 0d |w%,gad%!|G_icon).|
|00000640| 02 8a 21 c8 99 22 57 69 | 6d 70 5f 47 65 74 50 6f |..!.."Wi|mp_GetPo|
|00000650| 69 6e 74 65 72 49 6e 66 | 6f 22 2c 2c 62 75 66 25 |interInf|o",,buf%|
|00000660| 0d 02 94 13 62 75 66 25 | 21 32 30 3d 62 75 66 25 |....buf%|!20=buf%|
|00000670| 21 31 32 0d 02 9e 13 62 | 75 66 25 21 32 34 3d 62 |!12....b|uf%!24=b|
|00000680| 75 66 25 21 31 36 0d 02 | a8 12 62 75 66 25 21 32 |uf%!16..|..buf%!2|
|00000690| 38 3d 62 75 66 25 21 30 | 0d 02 b2 12 62 75 66 25 |8=buf%!0|....buf%|
|000006a0| 21 33 32 3d 62 75 66 25 | 21 34 0d 02 bc 0d 62 75 |!32=buf%|!4....bu|
|000006b0| 66 25 21 33 36 3d 30 0d | 02 c6 19 62 75 66 25 21 |f%!36=0.|...buf%!|
|000006c0| 34 30 3d 67 61 64 25 21 | 47 5f 64 5f 74 79 70 65 |40=gad%!|G_d_type|
|000006d0| 0d 02 d0 21 f2 73 74 72 | 73 65 74 28 62 75 66 25 |...!.str|set(buf%|
|000006e0| 2b 34 34 2c a4 6c 65 61 | 66 28 66 69 6c 65 24 29 |+44,.lea|f(file$)|
|000006f0| 29 0d 02 da 0d 62 75 66 | 25 21 30 3d 36 34 0d 02 |)....buf|%!0=64..|
|00000700| e4 0d 62 75 66 25 21 31 | 32 3d 30 0d 02 ee 18 62 |..buf%!1|2=0....b|
|00000710| 75 66 25 21 31 36 3d 31 | 3a f4 20 64 61 74 61 73 |uf%!16=1|:. datas|
|00000720| 61 76 65 0d 02 f8 30 c8 | 99 22 57 69 6d 70 5f 53 |ave...0.|."Wimp_S|
|00000730| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 31 37 2c 62 |endMessa|ge",17,b|
|00000740| 75 66 25 2c 62 75 66 25 | 21 32 30 2c 62 75 66 25 |uf%,buf%|!20,buf%|
|00000750| 21 32 34 0d 03 02 18 64 | 72 61 67 66 69 6c 65 5f |!24....d|ragfile_|
|00000760| 72 65 66 25 3d 62 75 66 | 25 21 38 0d 03 0c 19 64 |ref%=buf|%!8....d|
|00000770| 72 61 67 66 69 6c 65 5f | 67 61 64 67 65 74 25 3d |ragfile_|gadget%=|
|00000780| 67 61 64 25 0d 03 16 06 | 3d 30 0d 03 20 04 0d 03 |gad%....|=0.. ...|
|00000790| 2a 24 dd 20 a4 5f 64 72 | 61 67 66 69 6c 65 5f 65 |*$. ._dr|agfile_e|
|000007a0| 76 65 6e 74 28 61 72 67 | 25 2c 72 65 61 73 6f 6e |vent(arg|%,reason|
|000007b0| 25 29 0d 03 34 0b ea 20 | 66 69 6c 65 24 0d 03 3e |%)..4.. |file$..>|
|000007c0| 1d e7 20 62 75 66 25 21 | 31 32 3d 64 72 61 67 66 |.. buf%!|12=dragf|
|000007d0| 69 6c 65 5f 72 65 66 25 | 20 8c 0d 03 48 1c 20 20 |ile_ref%| ...H.  |
|000007e0| 66 69 6c 65 24 3d a4 73 | 74 72 67 65 74 28 62 75 |file$=.s|trget(bu|
|000007f0| 66 25 2b 34 34 29 0d 03 | 52 1f 20 20 f2 74 72 61 |f%+44)..|R.  .tra|
|00000800| 63 65 28 22 66 69 6c 65 | 6e 61 6d 65 3d 22 2b 66 |ce("file|name="+f|
|00000810| 69 6c 65 24 29 0d 03 5c | 33 20 20 f4 20 6f 6e 6c |ile$)..\|3  . onl|
|00000820| 79 20 77 61 6e 74 20 72 | 65 61 6c 20 66 69 6c 65 |y want r|eal file|
|00000830| 73 2c 20 6e 6f 74 20 3c | 57 69 6d 70 24 53 63 72 |s, not <|Wimp$Scr|
|00000840| 61 70 3e 20 65 74 63 2e | 0d 03 66 4f 20 20 e7 20 |ap> etc.|..fO  . |
|00000850| c0 66 69 6c 65 24 2c 31 | 29 3c 3e 22 3c 22 20 f2 |.file$,1|)<>"<" .|
|00000860| 69 63 6f 6e 5f 73 65 74 | 74 65 78 74 28 64 6c 67 |icon_set|text(dlg|
|00000870| 5f 77 69 6e 64 6f 77 25 | 2c 64 72 61 67 66 69 6c |_window%|,dragfil|
|00000880| 65 5f 67 61 64 67 65 74 | 25 21 47 5f 69 63 6f 6e |e_gadget|%!G_icon|
|00000890| 2c 66 69 6c 65 24 29 0d | 03 70 08 20 20 3d b9 0d |,file$).|.p.  =..|
|000008a0| 03 7a 05 cd 0d 03 84 06 | 3d a3 0d ff             |.z......|=...    |
+--------+-------------------------+-------------------------+--------+--------+